fun Power(x, 0) = 1
  | Power(x, y) = x * Power(x, y-1);
  
fun ListLength(x::xs) = 1 + ListLength(xs);

fun attempt(a, b, res) = 
  if a = 100 then res
  else 
    let 
	  if !Repeated(Power(a, b), res) then res = res  
	in
	end;
	
	
ListLength(attemp(2, 2, []));